(org-publish-get-plist-from-filename):

Use mapc rather than mapcar (reinstall change deleted without log
entry 2007-10-22).

diff --git a/lisp/textmodes/org-publish.el b/lisp/textmodes/org-publish.el
index 26dc409e19cea32c278e168e1743bb4d3d199d7a..e98afaf4a6b916502b837d6a86f04cc25bd0f00a 100644 (file)
--- a/lisp/textmodes/org-publish.el
+++ b/lisp/textmodes/org-publish.el
@@ -426,7 +426,7 @@ nil if not found."
 (defun org-publish-get-plist-from-filename (filename)
   "Return publishing configuration plist for file FILENAME."
   (let ((found nil))
-    (mapcar
+    (mapc
      (lambda (plist)
        (let ((files (org-publish-get-base-files plist)))
         (if (member (expand-file-name filename) files)